home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1994 September / macformat-004.iso / Shareware City / Sound / DX7 Librarian 1.0.9 / Sample Scripts / 19 Send Program Change - 1 < prev    next >
Encoding:
Text File  |  1994-07-11  |  191 b   |  7 lines  |  [TEXT/ToyS]

  1. tell application "DX7 Librarian"
  2.     activate -- if needed
  3.     set ch to 1 -- set MIDI channel  (1-16)
  4.     set num to 1 -- set PGM Number (1-128)
  5.     Program change {(ch - 1) * 256 + (num - 1)}
  6. end tell
  7.